home *** CD-ROM | disk | FTP | other *** search
/ Delphi Magazine Collection 2001 / Delphi Magazine Collection 20001 (2001).iso / DISKS / Issue26 / websol / writer_sample.pas < prev    next >
Encoding:
Pascal/Delphi Source File  |  1997-08-19  |  342 b   |  23 lines
  1. unit writer_sample;
  2.  
  3. interface
  4.  
  5. // Procs
  6.     Procedure WriterSample(objc: TObject; const psFormName: String);
  7.  
  8.  
  9. implementation
  10.  
  11. Uses
  12.     HTMLer, IAG_Server_Info, SysUtils;
  13.  
  14. Procedure WriterSample;
  15. begin
  16.     with iagin do begin
  17.         WriteHTML('<HTML><BODY>');
  18.         WriteHTML('The time is: ' + FormatDateTime('', now));
  19.     end;
  20. end;
  21.  
  22. end.
  23.